home *** CD-ROM | disk | FTP | other *** search
- /* Copyright (C) 1996, 1997 Aladdin Enterprises. All rights reserved.
-
- This file is part of Aladdin Ghostscript.
-
- Aladdin Ghostscript is distributed with NO WARRANTY OF ANY KIND. No author
- or distributor accepts any responsibility for the consequences of using it,
- or for whether it serves any particular purpose or works at all, unless he
- or she says so in writing. Refer to the Aladdin Ghostscript Free Public
- License (the "License") for full details.
-
- Every copy of Aladdin Ghostscript must include a copy of the License,
- normally in a plain ASCII text file named PUBLIC. The License grants you
- the right to copy, modify and redistribute Aladdin Ghostscript, but only
- under certain conditions described in the License. Among other things, the
- License requires that the copyright notice and this notice be preserved on
- all copies.
- */
-
- /* gdevnfwd.c */
- /* Null and forwarding device implementation */
- #include "gx.h"
- #include "gxdevice.h"
-
- /* ---------------- Forwarding procedures ---------------- */
-
- #define fdev ((gx_device_forward *)dev)
-
- /* Fill in NULL procedures in a forwarding device procedure record. */
- /* We don't fill in: open_device, close_device, or the lowest-level */
- /* drawing operations. */
- void
- gx_device_forward_fill_in_procs(register gx_device_forward *dev)
- { gx_device_set_procs((gx_device *)dev);
- /* NOT open_device */
- fill_dev_proc(dev, get_initial_matrix, gx_forward_get_initial_matrix);
- fill_dev_proc(dev, sync_output, gx_forward_sync_output);
- fill_dev_proc(dev, output_page, gx_forward_output_page);
- /* NOT close_device */
- fill_dev_proc(dev, map_rgb_color, gx_forward_map_rgb_color);
- fill_dev_proc(dev, map_color_rgb, gx_forward_map_color_rgb);
- /* NOT fill_rectangle */
- /* NOT tile_rectangle */
- /* NOT copy_mono */
- /* NOT copy_color */
- /* NOT draw_line (OBSOLETE) */
- fill_dev_proc(dev, get_bits, gx_forward_get_bits);
- fill_dev_proc(dev, get_params, gx_forward_get_params);
- fill_dev_proc(dev, put_params, gx_forward_put_params);
- fill_dev_proc(dev, map_cmyk_color, gx_forward_map_cmyk_color);
- fill_dev_proc(dev, get_xfont_procs, gx_forward_get_xfont_procs);
- fill_dev_proc(dev, get_xfont_device, gx_forward_get_xfont_device);
- fill_dev_proc(dev, map_rgb_alpha_color, gx_forward_map_rgb_alpha_color);
- fill_dev_proc(dev, get_page_device, gx_forward_get_page_device);
- fill_dev_proc(dev, get_alpha_bits, gx_forward_get_alpha_bits);
- /* NOT copy_alpha */
- fill_dev_proc(dev, get_band, gx_forward_get_band);
- fill_dev_proc(dev, copy_rop, gx_forward_copy_rop_proc);
- fill_dev_proc(dev, fill_path, gx_forward_fill_path);
- fill_dev_proc(dev, stroke_path, gx_forward_stroke_path);
- fill_dev_proc(dev, fill_mask, gx_forward_fill_mask);
- fill_dev_proc(dev, fill_trapezoid, gx_forward_fill_trapezoid);
- fill_dev_proc(dev, fill_parallelogram, gx_forward_fill_parallelogram);
- fill_dev_proc(dev, fill_triangle, gx_forward_fill_triangle);
- fill_dev_proc(dev, draw_thin_line, gx_forward_draw_thin_line);
- fill_dev_proc(dev, begin_image, gx_forward_begin_image);
- fill_dev_proc(dev, image_data, gx_forward_image_data);
- fill_dev_proc(dev, end_image, gx_forward_end_image);
- /* NOT strip_tile_rectangle */
- fill_dev_proc(dev, strip_copy_rop, gx_forward_strip_copy_rop_proc);
- fill_dev_proc(dev, get_clipping_box, gx_forward_get_clipping_box);
- gx_device_fill_in_procs((gx_device *)dev);
- }
-
- /* Forward the color mapping procedures from a device to its target. */
- void
- gx_device_forward_color_procs(gx_device_forward *dev)
- { set_dev_proc(dev, map_rgb_color, gx_forward_map_rgb_color);
- set_dev_proc(dev, map_color_rgb, gx_forward_map_color_rgb);
- set_dev_proc(dev, map_cmyk_color, gx_forward_map_cmyk_color);
- set_dev_proc(dev, map_rgb_alpha_color, gx_forward_map_rgb_alpha_color);
- }
-
- void
- gx_forward_get_initial_matrix(gx_device *dev, gs_matrix *pmat)
- { gx_device *tdev = fdev->target;
- if ( tdev == 0 )
- gx_default_get_initial_matrix(dev, pmat);
- else
- (*dev_proc(tdev, get_initial_matrix))(tdev, pmat);
- }
-
- int
- gx_forward_sync_output(gx_device *dev)
- { gx_device *tdev = fdev->target;
- return (tdev == 0 ? gx_default_sync_output(dev) :
- (*dev_proc(tdev, sync_output))(tdev));
- }
-
- int
- gx_forward_output_page(gx_device *dev, int num_copies, int flush)
- { gx_device *tdev = fdev->target;
- return (tdev == 0 ? gx_default_output_page(dev, num_copies, flush) :
- (*dev_proc(tdev, output_page))(tdev, num_copies, flush));
- }
-
- gx_color_index
- gx_forward_map_rgb_color(gx_device *dev, gx_color_value r, gx_color_value g,
- gx_color_value b)
- { gx_device *tdev = fdev->target;
- return (tdev == 0 ? gx_default_map_rgb_color(dev, r, g, b) :
- (*dev_proc(tdev, map_rgb_color))(tdev, r, g, b));
- }
-
- int
- gx_forward_map_color_rgb(gx_device *dev, gx_color_index color,
- gx_color_value prgb[3])
- { gx_device *tdev = fdev->target;
- return (tdev == 0 ? gx_default_map_color_rgb(dev, color, prgb) :
- (*dev_proc(tdev, map_color_rgb))(tdev, color, prgb));
- }
-
- int
- gx_forward_tile_rectangle(gx_device *dev, const gx_tile_bitmap *tile,
- int x, int y, int w, int h, gx_color_index color0, gx_color_index color1,
- int px, int py)
- { gx_device *tdev = fdev->target;
- dev_proc_tile_rectangle((*proc));
-
- if ( tdev == 0 )
- tdev = dev, proc = gx_default_tile_rectangle;
- else
- proc = dev_proc(tdev, tile_rectangle);
- return (*proc)(tdev, tile, x, y, w, h, color0, color1, px, py);
- }
-
- int
- gx_forward_get_bits(gx_device *dev, int y, byte *data, byte **actual_data)
- { gx_device *tdev = fdev->target;
- return (tdev == 0 ? gx_default_get_bits(dev, y, data, actual_data) :
- (*dev_proc(tdev, get_bits))(tdev, y, data, actual_data));
- }
-
- int
- gx_forward_get_params(gx_device *dev, gs_param_list *plist)
- { gx_device *tdev = fdev->target;
- return (tdev == 0 ? gx_default_get_params(dev, plist) :
- (*dev_proc(tdev, get_params))(tdev, plist));
- }
-
- int
- gx_forward_put_params(gx_device *dev, gs_param_list *plist)
- { gx_device *tdev = fdev->target;
- return (tdev == 0 ? gx_default_put_params(dev, plist) :
- (*dev_proc(tdev, put_params))(tdev, plist));
- }
-
- gx_color_index
- gx_forward_map_cmyk_color(gx_device *dev, gx_color_value c, gx_color_value m,
- gx_color_value y, gx_color_value k)
- { gx_device *tdev = fdev->target;
- return (tdev == 0 ? gx_default_map_cmyk_color(dev, c, m, y, k) :
- (*dev_proc(tdev, map_cmyk_color))(tdev, c, m, y, k));
- }
-
- gx_xfont_procs *
- gx_forward_get_xfont_procs(gx_device *dev)
- { gx_device *tdev = fdev->target;
- return (tdev == 0 ? gx_default_get_xfont_procs(dev) :
- (*dev_proc(tdev, get_xfont_procs))(tdev));
- }
-
- gx_device *
- gx_forward_get_xfont_device(gx_device *dev)
- { gx_device *tdev = fdev->target;
- return (tdev == 0 ? gx_default_get_xfont_device(dev) :
- (*dev_proc(tdev, get_xfont_device))(tdev));
- }
-
- gx_color_index
- gx_forward_map_rgb_alpha_color(gx_device *dev, gx_color_value r,
- gx_color_value g, gx_color_value b, gx_color_value alpha)
- { gx_device *tdev = fdev->target;
- return (tdev == 0 ?
- gx_default_map_rgb_alpha_color(dev, r, g, b, alpha) :
- (*dev_proc(tdev, map_rgb_alpha_color))(tdev, r, g, b, alpha));
- }
-
- gx_device *
- gx_forward_get_page_device(gx_device *dev)
- { gx_device *tdev = fdev->target;
- gx_device *pdev;
-
- if ( tdev == 0 )
- return gx_default_get_page_device(dev);
- pdev = (*dev_proc(tdev, get_page_device))(tdev);
- return (pdev == tdev ? dev : pdev);
- }
-
- int
- gx_forward_get_alpha_bits(gx_device *dev, graphics_object_type type)
- { gx_device *tdev = fdev->target;
- return (tdev == 0 ?
- gx_default_get_alpha_bits(dev, type) :
- (*dev_proc(tdev, get_alpha_bits))(tdev, type));
- }
-
- int
- gx_forward_get_band(gx_device *dev, int y, int *band_start)
- { gx_device *tdev = fdev->target;
- return (tdev == 0 ?
- gx_default_get_band(dev, y, band_start) :
- (*dev_proc(tdev, get_band))(tdev, y, band_start));
- }
-
- int
- gx_forward_fill_path(gx_device *dev, const gs_imager_state *pis,
- gx_path *ppath, const gx_fill_params *params,
- const gx_drawing_color *pdcolor, const gx_clip_path *pcpath)
- { gx_device *tdev = fdev->target;
- dev_proc_fill_path((*proc));
-
- if ( tdev == 0 )
- tdev = dev, proc = gx_default_fill_path;
- else
- proc = dev_proc(tdev, fill_path);
- return (*proc)(tdev, pis, ppath, params, pdcolor, pcpath);
- }
-
- int
- gx_forward_stroke_path(gx_device *dev, const gs_imager_state *pis,
- gx_path *ppath, const gx_stroke_params *params,
- const gx_drawing_color *pdcolor, const gx_clip_path *pcpath)
- { gx_device *tdev = fdev->target;
- dev_proc_stroke_path((*proc));
-
- if ( tdev == 0 )
- tdev = dev, proc = gx_default_stroke_path;
- else
- proc = dev_proc(tdev, stroke_path);
- return (*proc)(tdev, pis, ppath, params, pdcolor, pcpath);
- }
-
- int
- gx_forward_fill_mask(gx_device *dev,
- const byte *data, int dx, int raster, gx_bitmap_id id,
- int x, int y, int w, int h,
- const gx_drawing_color *pdcolor, int depth,
- gs_logical_operation_t lop, const gx_clip_path *pcpath)
- { gx_device *tdev = fdev->target;
- dev_proc_fill_mask((*proc));
-
- if ( tdev == 0 )
- tdev = dev, proc = gx_default_fill_mask;
- else
- proc = dev_proc(tdev, fill_mask);
- return (*proc)(dev, data, dx, raster, id, x, y, w, h, pdcolor, depth,
- lop, pcpath);
- }
-
- int
- gx_forward_fill_trapezoid(gx_device *dev,
- const gs_fixed_edge *left, const gs_fixed_edge *right,
- fixed ybot, fixed ytop, bool swap_axes,
- const gx_drawing_color *pdcolor, gs_logical_operation_t lop)
- { gx_device *tdev = fdev->target;
- dev_proc_fill_trapezoid((*proc));
-
- if ( tdev == 0 )
- tdev = dev, proc = gx_default_fill_trapezoid;
- else
- proc = dev_proc(tdev, fill_trapezoid);
- return (*proc)(tdev, left, right, ybot, ytop, swap_axes, pdcolor, lop);
- }
-
- int
- gx_forward_fill_parallelogram(gx_device *dev,
- fixed px, fixed py, fixed ax, fixed ay, fixed bx, fixed by,
- const gx_drawing_color *pdcolor, gs_logical_operation_t lop)
- { gx_device *tdev = fdev->target;
- dev_proc_fill_parallelogram((*proc));
-
- if ( tdev == 0 )
- tdev = dev, proc = gx_default_fill_parallelogram;
- else
- proc = dev_proc(tdev, fill_parallelogram);
- return (*proc)(tdev, px, py, ax, ay, bx, by, pdcolor, lop);
- }
-
- int
- gx_forward_fill_triangle(gx_device *dev,
- fixed px, fixed py, fixed ax, fixed ay, fixed bx, fixed by,
- const gx_drawing_color *pdcolor, gs_logical_operation_t lop)
- { gx_device *tdev = fdev->target;
- dev_proc_fill_triangle((*proc));
-
- if ( tdev == 0 )
- tdev = dev, proc = gx_default_fill_triangle;
- else
- proc = dev_proc(tdev, fill_triangle);
- return (*proc)(tdev, px, py, ax, ay, bx, by, pdcolor, lop);
- }
-
- int
- gx_forward_draw_thin_line(gx_device *dev,
- fixed fx0, fixed fy0, fixed fx1, fixed fy1,
- const gx_drawing_color *pdcolor, gs_logical_operation_t lop)
- { gx_device *tdev = fdev->target;
- dev_proc_draw_thin_line((*proc));
-
- if ( tdev == 0 )
- tdev = dev, proc = gx_default_draw_thin_line;
- else
- proc = dev_proc(tdev, draw_thin_line);
- return (*proc)(tdev, fx0, fy0, fx1, fy1, pdcolor, lop);
- }
-
- int
- gx_forward_begin_image(gx_device *dev,
- const gs_imager_state *pis, const gs_image_t *pim,
- gs_image_format_t format, const gs_int_rect *prect,
- const gx_drawing_color *pdcolor, const gx_clip_path *pcpath,
- gs_memory_t *memory, void **pinfo)
- { gx_device *tdev = fdev->target;
- dev_proc_begin_image((*proc));
-
- if ( tdev == 0 )
- tdev = dev, proc = gx_default_begin_image;
- else
- proc = dev_proc(tdev, begin_image);
- return (*proc)(tdev, pis, pim, format, prect, pdcolor, pcpath,
- memory, pinfo);
- }
-
- int
- gx_forward_image_data(gx_device *dev,
- void *info, const byte **planes, int data_x, uint raster, int height)
- { gx_device *tdev = fdev->target;
- dev_proc_image_data((*proc));
-
- if ( tdev == 0 )
- tdev = dev, proc = gx_default_image_data;
- else
- proc = dev_proc(tdev, image_data);
- return (*proc)(tdev, info, planes, data_x, raster, height);
- }
-
- int
- gx_forward_end_image(gx_device *dev,
- void *info, bool draw_last)
- { gx_device *tdev = fdev->target;
- dev_proc_end_image((*proc));
-
- if ( tdev == 0 )
- tdev = dev, proc = gx_default_end_image;
- else
- proc = dev_proc(tdev, end_image);
- return (*proc)(tdev, info, draw_last);
- }
-
- int
- gx_forward_strip_tile_rectangle(gx_device *dev, const gx_strip_bitmap *tiles,
- int x, int y, int w, int h, gx_color_index color0, gx_color_index color1,
- int px, int py)
- { gx_device *tdev = fdev->target;
- dev_proc_strip_tile_rectangle((*proc));
-
- if ( tdev == 0 )
- tdev = dev, proc = gx_default_strip_tile_rectangle;
- else
- proc = dev_proc(tdev, strip_tile_rectangle);
- return (*proc)(tdev, tiles, x, y, w, h, color0, color1, px, py);
- }
-
- void
- gx_forward_get_clipping_box(gx_device *dev, gs_fixed_rect *pbox)
- { gx_device *tdev = fdev->target;
-
- if ( tdev == 0 )
- gx_default_get_clipping_box(dev, pbox);
- else
- (*dev_proc(tdev, get_clipping_box))(tdev, pbox);
- }
-
- /* ---------------- The null device(s) ---------------- */
-
- private dev_proc_fill_rectangle(null_fill_rectangle);
- private dev_proc_copy_mono(null_copy_mono);
- private dev_proc_copy_color(null_copy_color);
- private dev_proc_put_params(null_put_params);
- private dev_proc_copy_alpha(null_copy_alpha);
- private dev_proc_copy_rop(null_copy_rop);
- private dev_proc_fill_path(null_fill_path);
- private dev_proc_stroke_path(null_stroke_path);
- private dev_proc_fill_trapezoid(null_fill_trapezoid);
- private dev_proc_fill_parallelogram(null_fill_parallelogram);
- private dev_proc_fill_triangle(null_fill_triangle);
- private dev_proc_draw_thin_line(null_draw_thin_line);
- /* We would like to have null implementations of begin/data/end image, */
- /* but we can't do this, because image_data must keep track of the */
- /* Y position so it can return 1 when done. */
- private dev_proc_strip_copy_rop(null_strip_copy_rop);
-
- #define null_procs(get_page_device) {\
- gx_default_open_device,\
- gx_forward_get_initial_matrix,\
- gx_default_sync_output,\
- gx_default_output_page,\
- gx_default_close_device,\
- gx_forward_map_rgb_color,\
- gx_forward_map_color_rgb,\
- null_fill_rectangle,\
- gx_default_tile_rectangle,\
- null_copy_mono,\
- null_copy_color,\
- gx_default_draw_line,\
- gx_default_get_bits,\
- gx_forward_get_params,\
- null_put_params,\
- gx_forward_map_cmyk_color,\
- gx_forward_get_xfont_procs,\
- gx_forward_get_xfont_device,\
- gx_forward_map_rgb_alpha_color,\
- get_page_device, /* differs */\
- gx_forward_get_alpha_bits,\
- null_copy_alpha,\
- gx_forward_get_band,\
- null_copy_rop,\
- null_fill_path,\
- null_stroke_path,\
- gx_default_fill_mask,\
- null_fill_trapezoid,\
- null_fill_parallelogram,\
- null_fill_triangle,\
- null_draw_thin_line,\
- gx_default_begin_image,\
- gx_default_image_data,\
- gx_default_end_image,\
- gx_default_strip_tile_rectangle,\
- null_strip_copy_rop,\
- gx_default_get_clipping_box\
- }
-
- gx_device_null far_data gs_null_device = {
- std_device_std_body_open(gx_device_null, 0, "null",
- 0, 0, 72, 72),
- null_procs(gx_default_get_page_device /* not a page device */),
- 0 /* target */
- };
-
- gx_device_null far_data gs_nullpage_device = {
- std_device_std_body_open(gx_device_null, 0, "nullpage",
- 0, 0, 72, 72),
- null_procs(gx_page_device_get_page_device /* a page device */),
- 0 /* target */
- };
-
- private int
- null_fill_rectangle(gx_device *dev, int x, int y, int w, int h,
- gx_color_index color)
- { return 0;
- }
- private int
- null_copy_mono(gx_device *dev, const byte *data,
- int dx, int raster, gx_bitmap_id id, int x, int y, int w, int h,
- gx_color_index zero, gx_color_index one)
- { return 0;
- }
- private int
- null_copy_color(gx_device *dev, const byte *data,
- int data_x, int raster, gx_bitmap_id id,
- int x, int y, int width, int height)
- { return 0;
- }
- private int
- null_put_params(gx_device *dev, gs_param_list *plist)
- { /* We must defeat attempts to reset the size; */
- /* otherwise this is equivalent to gx_forward_put_params. */
- gx_device *tdev = fdev->target;
- int code;
-
- if ( tdev != 0 )
- return (*dev_proc(tdev, put_params))(tdev, plist);
- code = gx_default_put_params(dev, plist);
- if ( code < 0 )
- return code;
- dev->width = dev->height = 0;
- return code;
- }
- private int
- null_copy_alpha(gx_device *dev, const byte *data, int data_x,
- int raster, gx_bitmap_id id, int x, int y, int width, int height,
- gx_color_index color, int depth)
- { return 0;
- }
- private int
- null_copy_rop(gx_device *dev,
- const byte *sdata, int sourcex, uint sraster, gx_bitmap_id id,
- const gx_color_index *scolors,
- const gx_tile_bitmap *texture, const gx_color_index *tcolors,
- int x, int y, int width, int height,
- int phase_x, int phase_y, gs_logical_operation_t lop)
- { return 0;
- }
- private int
- null_fill_path(gx_device *dev, const gs_imager_state *pis,
- gx_path *ppath, const gx_fill_params *params,
- const gx_drawing_color *pdcolor, const gx_clip_path *pcpath)
- { return 0;
- }
- private int
- null_stroke_path(gx_device *dev, const gs_imager_state *pis,
- gx_path *ppath, const gx_stroke_params *params,
- const gx_drawing_color *pdcolor, const gx_clip_path *pcpath)
- { return 0;
- }
- private int
- null_fill_trapezoid(gx_device *dev,
- const gs_fixed_edge *left, const gs_fixed_edge *right,
- fixed ybot, fixed ytop, bool swap_axes,
- const gx_drawing_color *pdcolor, gs_logical_operation_t lop)
- { return 0;
- }
- private int
- null_fill_parallelogram(gx_device *dev,
- fixed px, fixed py, fixed ax, fixed ay, fixed bx, fixed by,
- const gx_drawing_color *pdcolor, gs_logical_operation_t lop)
- { return 0;
- }
- private int
- null_fill_triangle(gx_device *dev,
- fixed px, fixed py, fixed ax, fixed ay, fixed bx, fixed by,
- const gx_drawing_color *pdcolor, gs_logical_operation_t lop)
- { return 0;
- }
- private int
- null_draw_thin_line(gx_device *dev,
- fixed fx0, fixed fy0, fixed fx1, fixed fy1,
- const gx_drawing_color *pdcolor, gs_logical_operation_t lop)
- { return 0;
- }
- private int
- null_strip_copy_rop(gx_device *dev,
- const byte *sdata, int sourcex, uint sraster, gx_bitmap_id id,
- const gx_color_index *scolors,
- const gx_strip_bitmap *textures, const gx_color_index *tcolors,
- int x, int y, int width, int height,
- int phase_x, int phase_y, gs_logical_operation_t lop)
- { return 0;
- }
-
- #undef fdev
-